﻿Imports SuporteModel
Public Class UsuarioDao
    Implements IUsuario




    Public Function BuscaUsuario(ByVal parIdUsuario As Integer) As SuporteModel.Usuario Implements IUsuario.BuscaUsuario

    End Function

    Public Function Login(ByVal parNome As String, ByVal parSenha As String) As Usuario Implements IUsuario.Login

        Dim fClsConexao As New clsConexao
        Dim fListaUsuario As New List(Of clsUsuario)
        Dim sCondicao As String = "WHERE US_NOME = " & parNome & " AND US_SENHA = " & parSenha
        fClsConexao.CarregaObjeto(fListaUsuario, "USUARIOS", sCondicao, True)

        If fListaUsuario.Count > 0 Then

        End If


    End Function

    Public Function CadastrarUsuario(ByVal parUsuario As SuporteModel.Usuario) As Boolean Implements IUsuario.CadastrarUsuario
        Dim usuario As New clsUsuario
        usuario.Matricula = parUsuario.Codigo
        usuario.Nome = parUsuario.Nome
        usuario.Acesso = parUsuario.Acesso

    End Function

    Public Function AtualizarUsuario(ByVal parIdUsuario As Integer, ByVal parUsuarioNovo As SuporteModel.Usuario) As Boolean Implements IUsuario.AtualizarUsuario

    End Function

    Public Function ExcluirUsuario(ByVal parIdUsuario As Integer) As Boolean Implements IUsuario.ExcluirUsuario

    End Function

    Public Function CadastroTarefa(ByVal parTarefa As SuporteModel.Tarefa) As Boolean Implements IUsuario.CadastroTarefa

    End Function

    Public Function ExcluirTarefa(ByVal parIdTarefa As Integer) As Boolean Implements IUsuario.ExcluirTarefa

    End Function

    Public Function ListaTarefa(ByVal parDataInicio As Date, ByVal parDataFim As Date) As System.Collections.Generic.List(Of SuporteModel.Tarefa) Implements IUsuario.ListaTarefa

    End Function

    Public Function ListaTarefa(ByVal parDataInicio As Date, ByVal parDataFim As Date, ByVal parIdChamado As Integer) As System.Collections.Generic.List(Of SuporteModel.Tarefa) Implements IUsuario.ListaTarefa

    End Function

    Public Function ListaTarefa(ByVal parIdUsuario As Integer) As System.Collections.Generic.List(Of SuporteModel.Tarefa) Implements IUsuario.ListaTarefa

    End Function

    Public Function AtualizarTecnico(ByVal parIdTecnico As Integer, ByVal parNovoTecnico As SuporteModel.Tecnico) As Boolean Implements IUsuario.AtualizarTecnico

    End Function

    Public Function ExcluirTecnico(ByVal parIdTecnoco As Integer) As Boolean Implements IUsuario.ExcluirTecnico

    End Function

    Public Function ListarTecnicos() As System.Collections.Generic.List(Of SuporteModel.Tecnico) Implements IUsuario.ListarTecnicos

    End Function
End Class
